← Index
NYTProf Performance Profile   
For /Users/timbo/perl5/perlbrew/perls/perl-5.18.2/bin/perlcritic
  Run on Sat Mar 19 22:12:22 2016
Reported on Sat Mar 19 22:14:12 2016

Filename(eval 294)[/Users/timbo/perl5/perlbrew/perls/perl-5.18.2/lib/site_perl/5.18.2/Class/Tiny.pm:56]
StatementsExecuted 247 statements in 550µs
Eval Invoked At/Users/timbo/perl5/perlbrew/perls/perl-5.18.2/lib/site_perl/5.18.2/Class/Tiny.pm line 56
Sibling evals1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
23596308µs308µsPath::IsDev::Result::::pathPath::IsDev::Result::path
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1247550µs
# spent 308µs within Path::IsDev::Result::path which was called 235 times, avg 1µs/call: # 137 times (170µs+0s) by Path::IsDev::Role::Matcher::Child::Exists::Any::child_exists at line 36 of Path/IsDev/Role/Matcher/Child/Exists/Any.pm, avg 1µs/call # 22 times (39µs+0s) by Path::IsDev::Result::BUILD at line 76 of Path/IsDev/Result.pm, avg 2µs/call # 21 times (30µs+0s) by Path::IsDev::Role::Matcher::FullPath::Is::Any::fullpath_is_any at line 89 of Path/IsDev/Role/Matcher/FullPath/Is/Any.pm, avg 1µs/call # 11 times (16µs+0s) by Path::IsDev::Result::BUILD at line 67 of Path/IsDev/Result.pm, avg 1µs/call # 11 times (15µs+0s) by Path::IsDev::Result::BUILD at line 70 of Path/IsDev/Result.pm, avg 1µs/call # 11 times (12µs+0s) by Path::IsDev::Object::__ANON__[/Users/timbo/perl5/perlbrew/perls/perl-5.18.2/lib/site_perl/5.18.2/Path/IsDev/Object.pm:201] at line 199 of Path/IsDev/Object.pm, avg 1µs/call # 11 times (12µs+0s) by Path::IsDev::Result::BUILD at line 73 of Path/IsDev/Result.pm, avg 1µs/call # 9 times (12µs+0s) by Path::IsDev::Role::Matcher::Child::BaseName::MatchRegexp::File::child_basename_matchregexp_file at line 70 of Path/IsDev/Role/Matcher/Child/BaseName/MatchRegexp/File.pm, avg 1µs/call # 2 times (3µs+0s) by Path::IsDev::Role::HeuristicSet::matches at line 69 of Path/IsDev/Role/HeuristicSet.pm, avg 1µs/call
package Path::IsDev::Result; my $default=$outer_default; sub path { if (@_ == 1) {return $_[0]{path} } else { return $_[0]{path}=$_[1] } }
2;